inherited frmCheque_Use: TfrmCheque_Use
  Left = 353
  Top = 128
  Caption = #31080#25454#20351#29992#30331#35760
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel1: TPanel
    inherited labFuncName: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited labFuncDesc: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited edtFilter: TcxTextEdit
      ExplicitHeight = 20
    end
  end
  inherited pnlMain: TPanel
    Height = 322
    ExplicitHeight = 322
    inherited MainDataGrid: TcxGrid
      Top = 41
      Height = 281
      ExplicitTop = 41
      ExplicitHeight = 281
      inherited MainDataGridDBTableView: TcxGridDBTableView
        PopupMenu = pmUse
        OnCustomDrawCell = MainDataGridDBTableViewCustomDrawCell
        OptionsView.ColumnAutoWidth = True
        OptionsView.IndicatorWidth = 35
        object colstate: TcxGridDBColumn
          Caption = #31080#25454#29366#24577
          DataBinding.FieldName = 'state'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object colchequeno: TcxGridDBColumn
          Caption = #31080#25454#21495
          DataBinding.FieldName = 'chequeno'
          HeaderAlignmentHorz = taCenter
          Width = 120
        end
        object colaccountno: TcxGridDBColumn
          Caption = #38134#34892#24080#21495
          DataBinding.FieldName = 'accountno'
          HeaderAlignmentHorz = taCenter
          Width = 90
        end
        object colbuydate: TcxGridDBColumn
          Caption = #36141#32622#26085#26399
          DataBinding.FieldName = 'buydate'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object colui_username: TcxGridDBColumn
          Caption = #24320#21333#20154
          DataBinding.FieldName = 'ui_username'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object colusage: TcxGridDBColumn
          Caption = #29992#36884
          DataBinding.FieldName = 'usage'
          HeaderAlignmentHorz = taCenter
          Width = 180
        end
        object coltakeman: TcxGridDBColumn
          Caption = #39046#29992#20154
          DataBinding.FieldName = 'takeman'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object colcheckstate: TcxGridDBColumn
          DataBinding.FieldName = 'checkstate'
          Visible = False
        end
      end
    end
    object pnlTop: TPanel
      Left = 0
      Top = 0
      Width = 809
      Height = 41
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 1
      object cxLabel1: TcxLabel
        Left = 14
        Top = 12
        Caption = #38134#34892
      end
      object cxLabel2: TcxLabel
        Left = 332
        Top = 12
        Caption = #31080#25454#31181#31867
      end
      object chkCheck: TcxCheckBox
        Left = 629
        Top = 10
        Caption = #26174#31034#24050#26680#38144
        TabOrder = 2
        OnClick = chkCheckClick
      end
      object dynedtbankid: TcxDBLookupComboBox
        Tag = 26
        Left = 43
        Top = 10
        DataBinding.DataField = 'bankid'
        DataBinding.DataSource = dsFilter
        Properties.ListColumns = <>
        Properties.OnValidate = dynedtbankidPropertiesValidate
        TabOrder = 3
        Width = 145
      end
      object dynedtbalanceid: TcxDBLookupComboBox
        Tag = 15
        Left = 388
        Top = 10
        DataBinding.DataField = 'balanceid'
        DataBinding.DataSource = dsFilter
        Properties.ListColumns = <>
        Properties.OnValidate = dynedtbankidPropertiesValidate
        TabOrder = 4
        Width = 145
      end
      object lblmoney: TcxLabel
        Left = 193
        Top = 21
        Caption = #24065#31181
      end
      object lblbankno: TcxLabel
        Left = 193
        Top = 3
        Caption = #38134#34892#24080#21495
      end
    end
  end
  inherited pnlBottom: TPanel
    Top = 367
    Height = 55
    ExplicitTop = 367
    ExplicitHeight = 55
    inherited chkGroupSort: TcxCheckBox
      Top = 17
      ExplicitTop = 17
      ExplicitWidth = 72
    end
    inherited chkHandGroup: TcxCheckBox
      Top = 17
      ExplicitTop = 17
      ExplicitWidth = 72
    end
    inherited lblGroupSort: TcxLabel
      Top = 8
      Style.IsFontAssigned = True
      ExplicitTop = 8
      ExplicitWidth = 192
      ExplicitHeight = 44
      Height = 44
      Width = 192
    end
    inherited edtPause: TcxComboBox
      Top = 17
      Properties.Items.Strings = (
        #20840#37096
        #26410#20351#29992
        #24050#39046#29992
        #25903#20184'('#20973#35777')'
        #25903#20184'('#25163#24037')'
        #25903#20184'('#20986#32435')'
        #20316#24223
        #24050#26680#38144)
      ExplicitTop = 17
      ExplicitHeight = 20
    end
    inherited btnOperator: TcxButton
      Top = 15
      ExplicitTop = 15
    end
    inherited chkGridFilter: TcxCheckBox
      Top = 17
      ExplicitTop = 17
      ExplicitWidth = 72
    end
    inherited btnNew: TcxButton
      Top = 15
      TabOrder = 7
      ExplicitTop = 15
    end
    object btnUseCheque: TcxButton
      Left = 579
      Top = 15
      Width = 75
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = #31080#25454#20351#29992
      DropDownMenu = pmUse
      Kind = cxbkDropDownButton
      PopupMenu = pmUse
      TabOrder = 6
      OnClick = btnUseChequeClick
    end
  end
  inherited PopupMenu1: TPopupMenu
    inherited PopmnuNewRecord: TMenuItem
      Visible = False
    end
    inherited PopmnuDeleteRecord: TMenuItem
      Visible = False
    end
    inherited pmDeleteAllRecord: TMenuItem
      Visible = False
    end
  end
  inherited MainDataSetU: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tfb_cheque'
      
        '  (chequeid, chequebuyid, chequeno, filid, usage, takedate, limi' +
        'tamt, checkman, takeman, precheckdate, checkdate, amount, remark' +
        ', checked, state, checkstate, balanceid)'
      'VALUES'
      
        '  (:chequeid, :chequebuyid, :chequeno, :filid, :usage, :takedate' +
        ', :limitamt, :checkman, :takeman, :precheckdate, :checkdate, :am' +
        'ount, :remark, :checked, :state, :checkstate, :balanceid)')
    SQLDelete.Strings = (
      'DELETE FROM tfb_cheque'
      'WHERE'
      '  chequeid = :Old_chequeid'
      ''
      'delete from tfb_chequebuy'
      
        '  where not exists(select 1 from tfb_cheque where chequebuyid=:O' +
        'ld_chequebuyid)')
    SQLUpdate.Strings = (
      'UPDATE tfb_cheque'
      'SET'
      
        '  chequeid = :chequeid, chequebuyid = :chequebuyid, chequeno = :' +
        'chequeno, filid = :filid, usage = :usage, takedate = :takedate, ' +
        'limitamt = :limitamt, checkman = :checkman, takeman = :takeman, ' +
        'precheckdate = :precheckdate, checkdate = :checkdate, amount = :' +
        'amount, remark = :remark, checked = :checked, state = :state, ch' +
        'eckstate = :checkstate, balanceid = :balanceid'
      'WHERE'
      '  chequeid = :Old_chequeid')
    SQLLock.Strings = (
      'SELECT * FROM tfb_cheque'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  chequeid = :Old_chequeid')
    SQLRefresh.Strings = (
      
        'SELECT chequeid, chequebuyid, chequeno, filid, usage, takedate, ' +
        'limitamt, checkman, takeman, precheckdate, checkdate, amount, re' +
        'mark, checked, state, checkstate, balanceid FROM tfb_cheque'
      'WHERE'
      '  chequeid = :Old_chequeid')
    SQL.Strings = (
      
        'select d.*,m.create_by,m.buydate,b.bankname,b.accountno,u.ui_use' +
        'rname '
      '      from tfb_cheque d,tfb_chequebuy m,td_bank b,ts_usersinfo u'
      '      where m.chequebuyid=d.chequebuyid and m.bankid=b.bankid '
      '        and m.create_by=u.ui_userid and d.checkstate=0')
  end
  object pmUse: TPopupMenu
    OnPopup = pmUsePopup
    Left = 372
    Top = 344
    object muTake: TMenuItem
      Caption = #39046#29992
      OnClick = muTakeClick
    end
    object muModify: TMenuItem
      Caption = #20462#25913
      OnClick = muModifyClick
    end
    object muPay: TMenuItem
      Caption = #25903#20184
      OnClick = muPayClick
    end
    object muAbate: TMenuItem
      Caption = #20316#24223
    end
    object muCheck: TMenuItem
      Caption = #26680#38144
      OnClick = muCheckClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object muBack: TMenuItem
      Caption = #31080#25454#36864#22238
      OnClick = muBackClick
    end
    object muUnAbate: TMenuItem
      Caption = #21453#20316#24223
      OnClick = muUnAbateClick
    end
    object muUnCheck: TMenuItem
      Caption = #21453#26680#38144
      OnClick = muUnCheckClick
    end
  end
  object cdsFilter: TClientDataSet
    PersistDataPacket.Data = {
      3B0000009619E0BD0100000018000000020000000000030000003B000662616E
      6B696404000100000000000962616C616E6365696404000100000000000000}
    Active = True
    Aggregates = <>
    Params = <>
    Left = 224
    Top = 36
    object cdsFilterbankid: TIntegerField
      FieldName = 'bankid'
      OnChange = cdsFilterbankidChange
    end
    object cdsFilterbalanceid: TIntegerField
      FieldName = 'balanceid'
    end
  end
  object dsFilter: TDataSource
    DataSet = cdsFilter
    Left = 280
    Top = 36
  end
end
